home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 08 - 1992 / 08.04 Aug 92 / Hello TCL World / Hello.r < prev    next >
Encoding:
Text File  |  1991-05-17  |  1.9 KB  |  92 lines  |  [TEXT/KAHL]
  1. Hello.π.rsrc
  2. APPLHIWO        ;; APPL, followed by your "signature"
  3. *
  4. * The version number resource (old style). (the rest of
  5. * the stuff is at the end). Note that this must track
  6. * the 'vers' resource defined in Help Text. Don't forget
  7. * the space after 'STR '
  8. *
  9. type HIWO = STR 
  10. ,0
  11. Hello TCL World \A9 1991 Martin Minow, All Rights Reserved
  12.  
  13. Include TCL Resources
  14.  
  15. *
  16. * The menu bar
  17. *
  18. Type MBAR = GNRL
  19. , 1
  20. .i
  21. 6
  22. 1 2 3 10 1024 1025
  23.  
  24. Type MENU
  25. , 1024
  26. Test
  27. Unknown Command 1025#1025
  28.  
  29. Type MENU
  30. , 1025
  31. Define Text Box
  32. Not Floating, Show on Suspend#1026
  33. Not Floating, Hide on Suspend#1027
  34. Is Floating, Show on Suspend#1028
  35. Is Floating, Hide on Suspend#1029
  36.  
  37. *
  38. * The TextBox Window
  39. *
  40. Type WIND
  41. Text Box, 1024                ;; WIND_Note
  42.  
  43.  40 40 236 361
  44. InVisible GoAway
  45. 4                            ;; noGrowDocProc
  46. 0
  47.  
  48. *
  49. * The toggle TextBox menu strings
  50. *
  51. Type STR#
  52. Text Box Menu, 1024
  53. 2
  54. Show Text Box Window
  55. Hide Text Box Window
  56.  
  57. Type ICN# = GNRL        ;; The program's icon and mask
  58. ,128
  59. .H
  60. 01800000 03C00000 03C1E000 03C3F000 03C3F000 03C3F000 03C3F000 03C1E000
  61. 03C00000 03FFFFE0 03FFFFF0 03FFFFF0 01FFFFF0 001FFEF0 001FFEF0 001FFEF0
  62. 001FFEF0 001FFEF0 001FFEF0 001FFEF0 001F3EF0 001F3E60 001F3E00 001F3E00
  63. 001F3E00 001F3E00 001F3E00 001F3E00 001F3E00 001F3E00 001F3E00 000E1C00
  64. 01800000 03C00000 03C1E000 03C3F000 03C3F000 03C3F000 03C3F000 03C1E000
  65. 03C00000 03FFFFE0 03FFFFF0 03FFFFF0 01FFFFF0 001FFEF0 001FFEF0 001FFEF0
  66. 001FFEF0 001FFEF0 001FFEF0 001FFEF0 001FFEF0 001F3EF0 001F3E60 001F3E00
  67. 001F3E00 001F3E00 001F3E00 001F3E00 001F3E00 001F3E00 001F3E00 001F3E00
  68.  
  69. Type ics# = GNRL
  70. , 128
  71. .H
  72. 180019C0 19C019C0 1FF81FFC 0FFC03EC 03EC03EC 036C0360 03600360 03600360
  73. 180019C0 19C019C0 1FF81FFC 0FFC03EC 03EC03EC 03EC036C 03600360 03600360
  74.  
  75. type FREF        ;; The file reference -- points back to APPL 0
  76. ,128
  77.  APPL 0
  78.  
  79. type BNDL        ;; The file bundle
  80. ,128
  81.  HIWO 0            ;; Your signature, again.
  82.  ICN#            ;; The icon
  83.  0 128
  84.  FREF            ;; and file reference.
  85.  0 128
  86.  
  87. *
  88. * End
  89. *
  90.  
  91.  
  92.